unit Cobrador;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, SqlExpr, Provider, DB, DBLocal, DBLocalS, DBClient,
  ZAbstractRODataset, ZDataset, Mask, DBCtrls, ComCtrls, Grids, DBGrids,
  StdCtrls, Buttons, ExtCtrls;

type
  TFrmCobrador = class(TForm)
    Panel1: TPanel;
    Bitnovo: TBitBtn;
    Bitgrava: TBitBtn;
    Bitcancela: TBitBtn;
    Bitedita: TBitBtn;
    Bitexclui: TBitBtn;
    Bitpesquisa: TBitBtn;
    Bitfecha: TBitBtn;
    Panel2: TPanel;
    Panel3: TPanel;
    GroupBox1: TGroupBox;
    edtRegistro: TEdit;
    Panel4: TPanel;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    DBGrid1: TDBGrid;
    SbHints: TStatusBar;
    EdtCodigo: TDBEdit;
    edtNome: TDBEdit;
    edtComissao: TDBEdit;
    DtSrc: TDataSource;
    DtSrcDBGrid: TDataSource;
    ZSQLC_ConsultaDbGrid: TZReadOnlyQuery;
    DSP_Consulta: TDataSetProvider;
    CDS_Consulta_DbGrid: TClientDataSet;
    CDS_Consulta_DbGridCODIGO: TStringField;
    CDS_Consulta_DbGridNOME: TStringField;
    SQLC_Secao: TSQLClientDataSet;
    SQLC_SecaoSEC_CODIGO: TStringField;
    SQLC_SecaoSEC_NOME: TStringField;
    SQLC_SecaoSEC_COMISSAO: TFMTBCDField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FrmCobrador: TFrmCobrador;

implementation

{$R *.dfm}

end.
